home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1995 #5 & #6 / Amiga Plus CD - 1995 - No. 5 and 6.iso / tex / mf / inputs / dc / dxiligtb.mf < prev    next >
Text File  |  1994-04-12  |  6KB  |  182 lines
  1. % This is DXILIGTB.MF in text format, as of March 24, 1992
  2. %
  3. % DC fonts Version 1.1 (prerelease of EC fonts)
  4. %
  5. %          [ heavily borrowed from the Computer Modern Roman family of
  6. %            fonts by D. E. Knuth ]
  7. %
  8. % Content:
  9. %
  10. %   ligtable and kerning for italic fonts
  11. %
  12.  ligtable
  13.     "f":   "i"=:oct"034",
  14.            "f"=:oct"033",
  15.            "l"=:oct"035",
  16.            "'" kern itc#,
  17.            "?" kern itc#,
  18.            "!" kern itc#,
  19.            ")" kern itc#,
  20.            "]" kern itc#;
  21.  ligtable
  22.     oct"033":       % ff
  23.           "i"=:oct"036",
  24.           "l"=:oct"037",
  25.           "'" kern itc#,
  26.           "?" kern itc#,
  27.           "!" kern itc#,
  28.           ")" kern itc#,
  29.           "]" kern itc#;
  30.  ligtable
  31.     "`":  "`"=:oct"020";
  32.  ligtable
  33.     "'":  "'"=:oct"021",
  34.           "?" kern 2u#,
  35.           "!" kern 2u#;
  36.  ligtable
  37.     "-":  "-" =: oct"025";
  38.  ligtable
  39.     oct"025": "-"=:oct"026";  % "---"  => emdash
  40.  
  41.  ligtable "<": "<" =: oct"023";     % "<<"
  42.  ligtable ">": ">" =: oct"024";     % ">>"
  43.  ligtable ",": "," =: oct"022";     % ",,"
  44. %
  45. %
  46. def lig_o_table (expr k) =
  47.              "o" kern k,  oct"256" kern k, oct"362" kern k, oct"363" kern k,
  48.                           oct"364" kern k, oct"365" kern k, oct"366" kern k,
  49.                           oct"367" kern k, oct"370" kern k
  50. enddef;
  51. %
  52. %
  53. def lig_a_table (expr k) =
  54.            "a" kern k,    oct"241" kern k, oct"242" kern k, oct"340" kern k,
  55.                           oct"341" kern k, oct"342" kern k, oct"342" kern k,
  56.                           oct"343" kern k, oct"344" kern k, oct"345" kern k,
  57.                           oct"346" kern k
  58. enddef;
  59. def lig_c_table (expr k) =
  60.            "c" kern k,   oct"242" kern k, oct"243" kern k, oct"347" kern k
  61. enddef;
  62. %
  63. def lig_e_table (expr k)=
  64.              "e" kern k, oct"245" kern k, oct"246" kern k, oct"350" kern k,
  65.                          oct"351" kern k, oct"352" kern k, oct"353" kern k
  66. enddef;
  67. def lig_u_table (expr k)=
  68.              "u" kern k, oct"266" kern k, oct"267" kern k, oct"371" kern k,
  69.                          oct"372" kern k, oct"373" kern k, oct"374" kern k
  70. enddef;
  71. %
  72. def lig_cA_table =
  73.              "A": oct"200": oct"201": oct"300": oct"301": oct"302":
  74.              oct"303": oct"304": oct"305"
  75. enddef;
  76. def lig_A_table (expr k) =
  77.              "A" kern k, oct"200" kern k, oct"201" kern k, oct"300" kern k,
  78.               oct"301" kern k, oct"302" kern k,
  79.               oct"303" kern k, oct"304" kern k, oct"305" kern k
  80. enddef;
  81. def lig_cO_table =
  82.              "O": oct"216": oct"322": oct"323": oct"324": oct"325":
  83.                   oct"326": oct"330"
  84. enddef;
  85. def lig_O_table (expr k) =
  86.          "O" kern k,
  87.                   oct"216" kern k,  oct"322" kern k,  oct"323" kern k,
  88.                   oct"324" kern k,  oct"325" kern k,
  89.                   oct"326" kern k,  oct"330" kern k
  90. enddef;
  91. def lig_U_table (expr k) =
  92.          "U" kern k, oct"226" kern k, oct"227" kern k, oct"331" kern k,
  93.                      oct"332" kern k, oct"333" kern k, oct"334" kern k
  94. enddef;
  95. if not monospace:
  96.  k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#; % three degrees of kerning
  97.  ligtable
  98.         "d":
  99.         "w":
  100.         "l":    "l" kern +u#,
  101.                 oct"250" kern +u#,
  102.                 oct"251" kern +u#;
  103.  ligtable
  104.         "F":
  105.         "V":    "o" kern kk#,
  106.                 "e" kern kk#, oct"246" kern kk#,
  107.                 "u" kern kk#,
  108.                 "r" kern kk#,
  109.                 "a" kern kk#, oct"241" kern kk#,
  110.                 lig_A_table(kkk#),
  111.         "K":
  112.         "X":    lig_O_table(k#),
  113.                 "C" kern k#, oct"202" kern k#, oct"203" kern k#,
  114.                 "G" kern k#, oct"207" kern k#,
  115.                 "Q" kern k#;
  116.  ligtable
  117.         "T":
  118.         oct"224":
  119.         oct"225":
  120.                 "y" kern kk#,
  121.         "Y":
  122.         oct"335":
  123.                 "e" kern kk#,
  124.                 "o" kern kk#,
  125.                 "r" kern kk#,
  126.                 "a" kern kk#,
  127.                 "u" kern kk#,
  128.         "P":
  129.         "W":    lig_A_table(kk#);
  130.  ligtable
  131.         lig_cO_table:
  132.         "D":
  133.         oct"204":
  134.                 "X" kern k#,
  135.                 "W" kern k#,
  136.                 lig_A_table(k#),
  137.                 "V" kern k#,
  138.                 "Y" kern k#, oct"335" kern k#;
  139.  ligtable
  140.         lig_cA_table:
  141.         "R":
  142.         oct"217":
  143.                 "n" kern k#,
  144.                 "l" kern k#, oct"250" kern k#, oct"251" kern k#,
  145.                 "r" kern k#,
  146.                 lig_u_table(k#),
  147.                 "m" kern k#,
  148.                 "t" kern k#, oct"264" kern k#, oct"265" kern k#,
  149.                 "i" kern k#, oct"355" kern k#,
  150.                 "C" kern k#, oct"203" kern k#, oct"202" kern k#,
  151.                 lig_O_table(k#),
  152.                 "G" kern k#, oct"207" kern k#,
  153.                 "h" kern k#,
  154.                 "b" kern k#,
  155.                 lig_U_table(k#),
  156.                 "k" kern k#,
  157.                 "v" kern k#,
  158.                 "w" kern k#,
  159.                 "Q" kern k#,
  160.         "L":    "T" kern kk#, oct"224" kern kk#, oct"225" kern kk#,
  161.                 "Y" kern kk#, oct"230" kern kk#,
  162.                 "V" kern kkk#,
  163.                 "W" kern kkk#,
  164.         "b":
  165.         "c": oct"242": oct"243":
  166.         "e": oct"245": oct"246": oct"350": oct"351": oct"352": oct"353":
  167.         "o": oct"362": oct"363": oct"364": oct"365": oct"366":
  168.         oct"376":
  169.         "p":
  170.         "r":    lig_e_table(-u#),
  171.                 lig_a_table(-u#),
  172.                 lig_o_table(-u#),
  173.                 "d" kern -u#,  oct"236" kern -u#,
  174.                 lig_c_table(-u#),
  175.                 "g" kern -u#,  oct"247" kern -u#,
  176.                 "q" kern -u#;
  177.  ligtable
  178.         "n":    "'" kern kkk#;
  179. fi
  180.  
  181. endinput;
  182.